Attribute VB_Name = "modMain"
Public cn As New ADODB.Connection
Public Const ENCKEY = "YhdJ77sSK8as"
Public externlog As Boolean
Public currentuser As String


Sub Main()
    InitDB
    externlog = True
    frmSplash.Show
End Sub


